﻿// snake.cpp : 定义应用程序的入口点。
//

#include "framework.h"
#include "snake.h"
#include "resource.h"
#include <list>
#include <ctime>

#define MAX_LOADSTRING 100
#define ID_TIMER1  1



// 全局变量:
HINSTANCE hInst;                                // 当前实例
WCHAR szTitle[MAX_LOADSTRING];                  // 标题栏文本
WCHAR szWindowClass[MAX_LOADSTRING];            // 主窗口类名

// 此代码模块中包含的函数的前向声明:
ATOM                MyRegisterClass(HINSTANCE hInstance);
BOOL                InitInstance(HINSTANCE, int);
LRESULT CALLBACK    WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    About(HWND, UINT, WPARAM, LPARAM);
 

int APIENTRY wWinMain(_In_ HINSTANCE hInstance,
	_In_opt_ HINSTANCE hPrevInstance,
	_In_ LPWSTR    lpCmdLine,
	_In_ int       nCmdShow)
{


	UNREFERENCED_PARAMETER(hPrevInstance);
	UNREFERENCED_PARAMETER(lpCmdLine);

	// TODO: 在此处放置代码。

	// 初始化全局字符串
	LoadStringW(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadStringW(hInstance, IDC_SNAKE, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	// 执行应用程序初始化:
	if (!InitInstance(hInstance, nCmdShow))
	{
		return FALSE;
	}

	HACCEL hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_SNAKE));

	MSG msg;

	// 主消息循环:
	while (GetMessage(&msg, nullptr, 0, 0))
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

	return (int)msg.wParam;
}


//
//  函数: MyRegisterClass()
//
//  目标: 注册窗口类。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
	WNDCLASSEXW wcex;

	wcex.cbSize = sizeof(WNDCLASSEX);

	wcex.style = CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc = WndProc;
	wcex.cbClsExtra = 0;
	wcex.cbWndExtra = 0;
	wcex.hInstance = hInstance;
	wcex.hIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_SNAKE));
	wcex.hCursor = LoadCursor(nullptr, IDC_ARROW);
	wcex.hbrBackground = (HBRUSH)(COLOR_GRAYTEXT + 1);
	wcex.lpszMenuName = MAKEINTRESOURCEW(IDC_SNAKE);
	wcex.lpszClassName = szWindowClass;
	wcex.hIconSm = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));

	return RegisterClassExW(&wcex);
}

//
//   函数: InitInstance(HINSTANCE, int)
//
//   目标: 保存实例句柄并创建主窗口
//
//   注释:
//
//        在此函数中，我们在全局变量中保存实例句柄并
//        创建和显示主程序窗口。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
	hInst = hInstance; // 将实例句柄存储在全局变量中

	HWND hWnd = CreateWindowW(szWindowClass, szTitle, WS_CAPTION | WS_OVERLAPPED | WS_SYSMENU,
		CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, nullptr, nullptr, hInstance, nullptr);

	if (!hWnd)
	{
		return FALSE;
	}

	ShowWindow(hWnd, nCmdShow);
	UpdateWindow(hWnd);

	return TRUE;
}

//
//  函数: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目标: 处理主窗口的消息。
//
//  WM_COMMAND  - 处理应用程序菜单
//  WM_PAINT    - 绘制主窗口
//  WM_DESTROY  - 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	static RECT rect;
	static int cxChar, cyChar, line,column,winHeight,cliHeight,nonclientHeight,flag;
	static Snake snake;
	static POINT point;                       //用来存放随机点

	switch (message)
	{
	case WM_CREATE:
		cxChar = LOWORD(GetDialogBaseUnits());
		cyChar = HIWORD(GetDialogBaseUnits());
        
		GetWindowRect(hWnd, &rect);
		winHeight = rect.bottom - rect.top;

		GetClientRect(hWnd, &rect);
		cliHeight = rect.bottom - rect.top;

		nonclientHeight = winHeight - cliHeight;
		
		MoveWindow(hWnd, rect.left + 90 * cxChar, rect.top + 20 * cyChar, 40 * cxChar, 21*cyChar+nonclientHeight, true);
		GetClientRect(hWnd, &rect);

		line = rect.bottom / cyChar;
		column = rect.right / (2*cxChar);

		srand((int)time(NULL));

		//初始化snake
		snake.Begin(0,rect.bottom/line,0,rect.right/column);
		point = snake.rand_point();

		SetTimer(hWnd, ID_TIMER1, 200, NULL);       
		return 0;

	case WM_TIMER:
		switch (wParam)
		{
		case ID_TIMER1:
			snake.move(flag);

			if (!snake.impact())
			{
				KillTimer(hWnd, ID_TIMER1);
				MessageBox(hWnd, TEXT("挑战失败!"), TEXT("Snake"), MB_OK);
				return 0;
			}

			if (snake.eat(point, flag))
			{
				point = snake.rand_point();
			}


			InvalidateRect(hWnd, nullptr, TRUE);
			break;
		}
		return 0;

	case WM_KEYDOWN:
		switch (wParam)
		{
		case VK_UP:
			flag = 1;

			break;

		case VK_DOWN:
			flag = 2;
			break;

		case VK_LEFT:
			flag = 3;
			break;

		case VK_RIGHT:
			flag = 4;
			break;

		default:
			DefWindowProc(hWnd, message, wParam, lParam);
		}
		return 0;

	case WM_COMMAND:
	{
		int wmId = LOWORD(wParam); // 分析菜单选择:
		switch (wmId)
		{
		case IDM_ABOUT:
			DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
			break;
		case IDM_EXIT:
			DestroyWindow(hWnd);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
		}
	}
	break;

	case WM_PAINT:
	{
		PAINTSTRUCT ps;
		HDC hdc = BeginPaint(hWnd, &ps);
		// TODO: 在此处添加使用 hdc 的任何绘图代码...

		//客户区画线
		for (int y = 0; y < rect.bottom; y += line)
		{
			MoveToEx(hdc, 0, y, NULL);
			LineTo(hdc, rect.right, y);
		}
		for (int x = 0; x < rect.right; x += column)
		{
			MoveToEx(hdc, x, 0, NULL);
			LineTo(hdc, x, rect.bottom);
		}

		//加载位图
		HBITMAP hbitmap;
		HDC mdc = CreateCompatibleDC(hdc);
		hbitmap = (HBITMAP)LoadImage((HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE), (LPCWSTR)IDB_BITMAP1, IMAGE_BITMAP, 48, 48, LR_DEFAULTCOLOR);
		SelectObject(mdc, hbitmap);

		//显示随机点
		BitBlt(hdc, column*point.x,line*point.y, column , line , mdc, 0, 0, SRCCOPY);

		//显示所有snake模块
		auto p = snake.ReturnList()->begin();
		auto q = snake.ReturnList()->end();
		for (p;p!=q;p++)
		{
			BitBlt(hdc, column*p->x, line*p->y, column , line , mdc, 0, 0, SRCCOPY);
		}
		DeleteObject(hbitmap);
		DeleteDC(mdc);
		EndPaint(hWnd, &ps);
	}
	return 0;

	case WM_DESTROY:
		KillTimer(hWnd, ID_TIMER1);
		PostQuitMessage(0);
		return 0;

	default:
		return DefWindowProc(hWnd, message, wParam, lParam);
	}
	return 0;
}

// “关于”框的消息处理程序。
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	UNREFERENCED_PARAMETER(lParam);
	switch (message)
	{
	case WM_INITDIALOG:
		return (INT_PTR)TRUE;

	case WM_COMMAND:
		if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
		{
			EndDialog(hDlg, LOWORD(wParam));
			return (INT_PTR)TRUE;
		}
		break;
	}
	return (INT_PTR)FALSE;
}
